Top 10k strings from Madchentest (19xx)(-)(de).tap in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Utilities & Educational / Sinclair ZX Spectrum - Utilities & Educational - [TAP] (TOSEC-v2007-01-01) /
Back to the directory listing
2 ;". ";l$(n-1
1 z$=" "
1 y$=" "+y$+" "
1 v(n1)>v(n2)
1 v(j)=v(j)+m(j,i)*f(i)
1 v(j)=c*v(j):
1 o$(n,i)="."
1 o$(n,i)=" "
1 o$(n)=b$(au):
1 o$(n)=b$(au)
1 m(j,i)=m(j,i)/c:
1 m a+
1 f(n)=f(n)/c:
1 ersz
1 d=v(c1)-v(c2)
1 d$="Stop the tape!":
1 d$=" M~dchentest":
1 c=c+m(j,i):
1 a$=" "+c$(
1 Renumberprogramm
1 F[r RENUMBER > GO TO 9970! Suche der neuen Zeilennummer mit GO TO 9980 /Ausschalten der Sonderzeichen: POKE 23606,0: POKE 23607,60
1 Es sind folgende Zeichen geladen: [ ] ~ | \ { } @ [ber Grafik
1 ;z$;" Dr[cken Sie nur ENTER, wenn die Aufz~hlung beendet ist! ";z$
1 ;"~ auf";
1 ;"} auf";
1 ;"| auf";
1 ;"{ auf";
1 ;"[ auf";
1 ;"Zeilenzahl: ";zz-1
1 ;"W~hlen Sie nun aus dem Angebot die Faktoren aus,die Sie bewer- ten wollen! ":
1 ;"Wenn Ihnen das nicht reicht,dannk{nnen Sie noch bis sechs andereFaktoren eingeben."''"Wenn nicht, dr[cken Sie ENTER"
1 ;"Welche von den ersten 7 Faktorenwollen Sie au@erdem noch in die Wertung einbeziehen? "
1 ;"Taste dr
1 ;"Sie wollten eine Entscheidung"''"bei der ";
1 ;"Reicht es aus, dann dr[cken Sie ";
1 ;"Punkte f[r ";:
1 ;"Programm wird gespeichert!":
1 ;"Programm fehlerfrei gespeichert":
1 ;"Nr. eingeben! ";a$:
1 ;"Gesamtzahl: ";zg;" ":
1 ;"Geben Sie die Kennnummer ein! ";
1 ;"Eigenschaft: ";o$(n)
1 ;"Dr[cken Sie eine Taste,wenn es weiter gehen kann!"
1 ;"Die Sonderzeichen erhalten Sie auf folgenden Tasten:"
1 ;"Das sind dann also: "
1 ;"Dabei hat ";
1 ;"Commodore C64 Programm aus CHIP"''"Umgesetzt auf SPECTRUM von MJust":
1 ;"Band zur[ck f[r
1 ;"@ auf":
1 ;". ";o$(n),
1 ;"!"''"Sie geben dann den anderen"'"M~dchen Werte gr{@er oder"'"kleiner 10, je nachdem, wie sie"'"im Vergleich zu ";
1 ;" treffen!"''"Da m]ssen Sie wenigstens zwei"''"Namen eingeben!":
1 ;" den Wert ";
1 ;" Und nun geben Sie die Namen der M~dchen (maximal 10) ";z$'t$(a);" "'z$;" ein! "
1 ;" Kennnummer eingeben! "
1 ;" Einzelwertung "
1 ;" Band weiter laufen lassen!";
1 ;" Auswahl ";
1 ;" ";o$(n);
1 ;" ";o$(f2);" 10 "
1 ;" ";n;t$(n):
1 ;" ";l$(j);" ";
1 ;" ";l$(c)
1 ;" ";f(n);" ":
1 ;" ";"""10""";" ";
1 ;" Damit wird Ihnen bei der Entscheidung f[r die Eine oder die Andere geholfen!"'" Sie sparen Zeit und k{nnen sich auf das Wesentliche"'" konzentrieren."
1 ;" Bestwert = 10 "
1 ;" ";f(n);" "
1 ;" SPACE ! ";
1 ;" "
1 * SAVE-Routine
1 )=" f[r's kommende Wochenende":
1 )=" f[r's Leben":
1 )=" f[r eine Nacht"
1 )=" f[r die n~chste Zeit":
1 (n);". Name: ";l$(n)
1 '"zu bewerten sind!"
1 '"abschneiden!"
1 "alte Zeilennummer: ";azz:
1 "Zum Anfang 'a' * Stopp 's' ";a$
1 "Wir werten den Faktor":
1 "Wert f[r ";(o$(n));" ";f(n)
1 "Wenn Sie das nicht f[r erforder-lich halten, dann dr[cken sie ENTER"
1 "Welche von diesen ";f0;" Eigen-"'"schaften ist bei einem M~dchen"''t$(a)''"die wichtigste?"
1 "Startzeile: ";z,"Schritt: ";s:
1 "RENUMBER von: ";von,"bis: ";bis,"mit Formel (Berechnung aus alter Zeilenzahl >az< )",z$
1 "Nun m[ssen Sie den Bedeutungs-"'"wert der anderen Eigenschaften"'"festlegen.(Dezimalwerte sind OK)"
1 "Jetzt m[ssen Sie angeben, wie die einzelnen M~dchen bei den verschiedenen Faktoren"'"in Bezug auf ";
1 "Ihre Idealpartnerin hei@t":
1 "Hier ist die Reihenfolge:":
1 "Fehler beim Programmablauf"'''"Fehlercode: ";
1 "Faktor: ";b$(n)
1 "Die Skala reicht bis zum"'
1 "Dabei hat "'
1 "Busen","Geruch","Gr{@e","H[ften","Sex","Vitalit~t","Z~rtlichkeit"
1 "Bei der Entscheidung f[r eine Frau f[r das ganze Leben, mu@ man bei der Aufstellung der Auswahlkriterien sehr sorgf~ltigsein."'"Sie werden nach Tastendruck eineAufstellung von Faktoren angebo-ten bekommen.Sie k{nnen sie gegebenenfalls erg~nzen."
1 "Bei der Auswahl eines M~dchens"'t$(a)'"sind folgenden Faktoren wichtig:":
1 "Anschlie@end geben Sie die Kenn-nummern der Faktoren ein,die Siebei der Entscheidungsfindung ber[cksichtigen wollen (max.10)!"
1 "Anfang des"'"freien Platzes:";
1 "Alter","Auftreten","Figur","Gr{@e","Sch{nheit","Vitalit~t","Z~rtlichkeit"
1 "Alter","Attraktivit~t","Gr{@e","Intellegenz","Interessen","Vitalit~t","Z~rtlichkeit"
1 "Alter","Anpassungsf~higk.","Aussehen","Figur","Flei@","Gr{@e","H~uslichkeit","Intellegenz","Interessen","Kochkunst","Kontaktfreudigk.","Mitgift","Selbstbewu@t","Sex","Sparsamkeit","Toleranz","Treue","Vitalit~t","Z~rtlichkeit"
1 "Aber zun~chst m[ssen Sie eine Vorentscheidung treffen!"'"Geben Sie die entsprechende Zahl ein! Suchen Sie ein M~dchen"
1 "(mit deutlichem Abstand)"
1 "(eine ganz klare Entscheidung)"
1 "(aber nur mit knappen Vorsprung)"
1 Error-Routine ab 64291